library(plan)
b <- plan::read.burndown("burndown.dat",debug=TRUE)
summary(b)
